1 REM OPEN 15,8,15,"S0:BOOT C64 COMAL":CLOSE15:SAVE "0:BOOT C64 COMAL",8
10 PRINT "[147]"; : REM CLEAR SCREEN
20 POKE 53281,0: REM BACKGROUND BLACK
30 POKE 53280,0: REM BORDER     BLACK
32 PRINT "";   : REM PENCOLOR GREEN
34 IF A=1 THEN 46
35 OPEN 15,8,15,"U;"
36 INPUT#15,D1,A$,D2,D3
37 CLOSE15
39 IF "1541"<>MID$(A$,14,17) THEN 50
42 PRINT"[147]LOADING ML.SIZZLE
44 [139] A[178]0 [167] A[178]1:[147]"ML.SIZZLE",8,1
46 [158] 49152:[156]
50 [153] "LOADTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTO";
52 [153] " PLEASE WAIT WHILE COMAL 0.14 IS LOADED ";
120 [153]
130 [153] "PRINTTUTORIAL: FOUNDATIONS ... WITH COMAL"
145 [153] "DOCUMENTATION: COMAL HANDBOOK
150 PRINT "NEWSLETTER: COMAL TODAY
155 [153]
160 [153] "           DEFAVAILABLE FROM:           "
165 [153] "SYS"; : [143] PENCOLOR YELLOW
170 [153] "  COMAL USERS GROUP, U.S.A., LIMITED   "
180 [153] "          6041 MONONA DRIVE            "
185 [153] "          MADISON, WI 53716
190 PRINT "[153]SEND SELF ADDRESSED STAMPED ENVELOPE"
200 PRINT "OR CALL [158]608-222-4432[153] FOR MORE INFO."
210 PRINT "" : REM PENCOLOR WHITE
230 PRINT "  COMAL PROGRAMS CAN ONLY BE EXECUTED"
240 PRINT "  AFTER THE LANGUAGE HAS BEEN LOADED."
245 PRINT "[159]"; : REM PENCOLOR CYAN
250 PRINT "COMAL PROGRAMS ON THIS DISK ARE LOADED:"
270 PRINT "   LOAD "CHR$(34)"NAME"CHR$(34)
272 PRINT "   RUN"
275 PRINT "[185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]";
280 PRINT "   BACKUP THIS DISK BEFORE YOU USE IT   [146]";
899 REM
900 REM
910 REM CHAIN"HI + <RETURN KEY>
920 [151] 198,9
930 [151] 631,[198]("C")
940 [151] 632,[198]("H")
950 [151] 633,[198]("A")
960 [151] 634,[198]("I")
970 [151] 635,[198]("N")
980 [151] 636,34
990 [151] 637,[198]("H")
1000 [151] 638,[198]("I")
1010 [151] 639,13
1020 [147] "C64 COMAL 0.14",8